library(tidyverse)library(tidytext)library(lubridate)library(SnowballC)library(igraph)library(ggraph)library(stopwords)library(dplyr)theme_set(theme_minimal())# load one-row-per-line data ----------------------------------------------surveydata <-read_csv("/Users/nicholascoukoulis/Documents/Georgetown/MPP/Spring2023/DataScience/assignments/project/Groupproject/individualresponses_survey_updated_5.1.23.csv")surveydata <-filter(surveydata, !is.na(text))#dropping consent & working years since we've cleaned data to just include thesesurveydata <- surveydata[-c(1:2)]
Climate and Culture Facilitators
Q: Considering your school, what factors do you believe are presently or would be facilitators of a positive climate and culture related to special education?
A TF-IDF approach was applied to determine the most frequent, unique terms related to climate and culture facilitators.
Climate Barriers
Q: Considering your school, what factors, if any, do you believe are barriers that inhibit a positive climate and culture related to special education?
One word
Two word
Effective Communication
Q: Considering both district- and school-level communications, which practices do you perceive as effective?
two words
Ineffective Communication
Q: Considering both district- and school-level communications, which practices do you perceive as ineffective or inefficient?
Communication Recommendations
Q: What recommendations do you have for improving communication practices in Edmonds Public Schools?
The echo: false option disables the printing of code (only output is displayed).